@L}5 _$% l0$)$$Hȱ$ UhL" `e$$%`$%`  R@W!( L(1   Y I`  d  Ld M * @  $ % CC$$)%1 Udߥ$9%: !0 S$% DD˙`  }J)Lr d M * @  $ % CC$$)%1 Udߥ$9%: !0 S$%} DD˙`  }J)Lr J  ((  p L ()   J}L= ( L 0q A    IB JC;? D W } LL  ` W )LA!  ߰")-݆ p" } $G@LL 08`Q")<2Q0 -G$Ș݆ UL# ; p8(()(0ʥ)NQ` }$GȘ݆LU )L ݆ L GȘ ݆LL )W>Z   HH)H }p h  hyhy D L> L JJ    ! LA*` BF }7'8  M HN H` 8 Z  \LdJJ!"! GFE@F (!L }EE !E^ ^ E E7EȩEdE/EȩE  D } .L }  ;F d  ;?F7F? ( .   Z D LL d } . D  L    p  E` , d)  D L) 0BM݊L݉} ML  N݆ L NLML [ TEqEHȱEqEh 0Gȹ G} HLL GɛL  LFREE SECTORS G) *Gȩ GȽG GȌ*jj >G} C8jJ3j2CD( C202C ԠBX` N 1? l LlD:RAMDISK}.COMLu L1 L ;LHL  T`  `8  ɐ     `TU  } L ? .  t`GBJ ~DEHI B V0dV!}QDEHI VF9 ,0 ,0 s0hhL  L` H hDHEh"}DEL8HI4 0 HI,0 0  9 .G VLO#},0 L4*IJ`llD1:AUTORUN.SYSNEED MEM.SAV TO LOAD THIS FILE.D8:MEM.SAV J y08 B|DEHI$} V0 0`B;DEL`?<0LV`@ʆ v s? F0Ξ05: [ BDEHI%} VY8 B V  @  /DE `E:D8:DUP.SYSERROR-SAVING USER MEMORY ON DISKTYPE Y TO &}STILL RUN DOS B;DE J  (` 9 V⪍ ઍ  -'}LLu ÝDEHILV 9 .l 9 .l  `` s$B BH(}I|DE V BLV nB,DE JLV B V BLVDEIʩ BꭝLu =} 3E:}DISK OPERATING SYSTEM II VERSION COPYRIGHT 1984 ATARI CORP.A. DISK DIRECTORY I. FORMAT DISKB. RUN CARTRIDG*}E J. DUPLICATE DISKC. COPY FILE K. BINARY SAVED. DELETE FILE(S) L. BINARY LOADE. RENAME FILE M. RUN AT ADDRES+}SF. LOCK FILE N. CREATE MEM.SAVG. UNLOCK FILE O. DUPLICATE FILEH. WRITE DOS FILES P. FORMAT SINGLEL !N',}#"&))9(&*)/h)''-&؆莟R'S  vL/ˢ L }Insert DOS 2.0s, type Y Λx -}DEfHI 1莏#q! @ y0ɛ8A0,' ȅ 1 1ild! 1L!NO SUCH ITEMSELECT.} ITEM OR FOR MENU! 0 .z:*{}.|{ 1 0 0JB 18L%|DL/}%DIRECTORY--SEARCH SPEC,LIST FILE?[# 0 0 &|D3" 1L!NOT A DISK FILEN !B 1L!E# 1 !BD0}ED:}:1BJ|DE 1DEBHI 1 h0ߢ 0.1}  0?詛 1 y0YЛ 1 ;#L" ;#L! BL1TYPE "Y" TO DELETE...DELETE FILE SPEC2}COPY--FROM, TO?OPTION NOT ALLOWED188 FREE SECTORS COPYING---D8:READMEM.DATl# 0|D .L/%#3}##JB|DE 1BHID#E 1#0: B 1L!#͑### B 1#c$0SY4}S1}:## # # .#Ƚ# # 𩛙## 1,#PD#ELJ- <.BJD#E 5}1 1HH 0hh|DL%1}:̳# L% #D#EL% 1 0 . .0O% 1L!WILD CARDS NOT A6}LLOWED IN DESTINATION 0 <.|K}N 2 FORMAT. t* 5) 1L!`) 0NΞ 0 L1) 1 L!BAD LOAD FILELOAD FROM WHAT FILE?) 0 ?}0#B 1L!WHAT FILE TO LOCK?) 0 0$B 1L!WHAT FILE TO UNLOCK?DUP DISK-SOURCE,DEST DRIVES?TYPE "Y" IF OK TO US@}E PROGRAM AREACAUTION: A "Y" INVALIDATES MEM.SAV.FE! +L1   `*  70 2 2A} 0.* 1 y0 0)INSERT BOTH DISKS, TYPE RETURN^, 1 y038逍 N, 1L! ,B}C, t*  Lx+, 0 ^, 1 y0 , ,0,0 ,L+ ,I0 ,Vǭ0C}Ξ, 0 }, 1 y0C,ШC, 0K'!" H H 'h h Lx+!EF 5L1L!D,I,HhD}` NOT ENOUGH ROOMINSERT SOURCE DISK,TYPE RETURNINSERT DESTINATION DISK,TYPE RETURNE}`  `8 rL1`-* 1P* 1 y0Y`hhL!NAME OF FILE TO MOVE?- 0 0|DL% <.F},^ 1 70 0 .@L# .BJ 1  DEHIB V L1 ,} 1 70,L.  G}JB|,#P#DE 1 HI BDEHHII 1 B 1 ,^ 1 70,0La- B V,#PH},^ 1 70 0L#L!-* 1P* 1 y0Yj383}mm ݭI}}`8}``|* ? ɛ,`|:-)| / 1L!`DESTINATION CANT BE DOJ}S.SYS0 0H{ 24Δ 28/L!/) 2 Π 2 0 ξK}hAΞB,0 J 1 BDEHI,HÝDE 1HIHIDELSAVE-GIVE L}FILE,START,END(,INIT,RUN)O S0 1`BDEPHI V` S0H 1 L!M}0 0 1L~0`PLEASE TYPE 1 LETTER,0`hhL! 70 1L0L<1 ,;ɛ7,"ɛ:ݦ1ݥN}A"D|ݤD|ȩ:|ȩ|ɛ,,(/+.ީ1 1,ɛ`轤{NAMEO} TOO LONG B VL!` L1I H1EΝDL1|mDiE` V0`8d/8 i:222 1 LP}!ERROR- 164ɛ+,' 20*.. өr2 1``2TOO MANY DIGITSINVALID HEXAQ}DECIMAL PARAMETER800 0 8 00`,0'D800 H,ɛh`2L1NEED D1 THRU D8TuR} ECIMAL PARAMETER800 0 8 00`,0'D800 H,ɛh`2L1NEED D1 THRU D8Tu10000 REM 10010 REM | INPUT DATA |10020 REM 10030 REM 10040 REM TABLE AND CHAIRS10060 DATA 2T},18,-5,TABLE10070 DATA 8,10,20,-5.5,210080 DATA 10,19.25,-1.5,1.5,-1.510090 DATA 10,19.25,-8.0,1.5,-1.510100 DATA 10,16,-U}4.50,1.5,-1.510110 DATA 10,22.75,-4.50,1.5,-1.510120 REM BASEMENT WALLS(OUTSIDE)10130 DATA 11,-1,1,5,-110140 DATA 11,6.75V},1,20.95,-110150 DATA 10,4,1,2.75,-.2510160 DATA 11,-1,-24.5,28.7,-110170 DATA 11,26.7,0,1,-24.510180 REM SOUTH WALL AND W}WINDOWS10185 DATA 1,0,0,BASEMENT LAYOUT 198410190 DATA 11,-1,0,1,-1.510200 DATA 11,-1,-4.25,1,-1.1510210 DATA 10,-1,-1.5,X}.25,-2.7510220 DATA 10,-1,-5.4,.25,-2.7510230 DATA 11,-1,-8.15,1,-7.710240 DATA 10,-1,-15.85,.25,-2.7510250 DATA 11,-1,-1Y}8.6,1,-1.2510260 DATA 10,-1,-19.85,.25,-2.7510270 DATA 11,-1,-22.6,1,-1.910280 REM INSIDE WALLS10290 DATA 9,7, .5,-.5, .5Z},-24, 26.2,-2410300 DATA 26.2,-15, 13.5,-15, 13.5,-14.5, 26.7,-14.510310 DATA 10,13.5,-10.75,13.4,-.510320 REM SUMP PUMP1[}0330 DATA 8,15,2.75,-2,.7510340 REM HOT WATER HEATER10350 DATA 8,15,9.5,-1,.7510360 REM SAW SHOP VAC10370 DATA 8,15,17.5,\}-21,.7510380 REM SHOP SAW10390 DATA 2,12.8,-20.9,SAW10400 DATA 10,12.5,-20.25,3.5,-210410 REM FURNACE WALL10420 DATA 9,1]}1, .5,-.5, 7,-.5, 7,-3, 9,-710430 DATA 13.75,-7, 13.75,-2.25, 13.4,-2.25, 13.4,-6.65, 9.3,-6.65, 7.35,-2.8, 7.35,010440 REM^} FURNACE10450 DATA 3,11,-3,F10460 DATA 10,10,-2.5,2.25,-3.510470 REM SHELVES10480 DATA 10,25.5,-2,1,-8.2510490 DATA 10,1_}8.7,-.3,7,-110500 REM WORK BENCH10510 DATA 2,19,-15.5,BENCH10520 DATA 10,18.2,-15,8,-2.510530 REM HIGH SAW HORSES10540 D`}ATA 10,19,-20,.5,-2.210550 DATA 10,9,-20,.5,-2.210560 REM GRINDER10570 DATA 10,10,-22.5,1.5,-110580 REM SHOP WASTEBASKET a}& VACUUM10590 DATA 8,15,14.25,-16.25,.7510600 DATA 8,20,16,-16,.510610 REM STUDY DESK10620 DATA 3,1,-2,DESK10630 DATA 9,b}5, 7,-2.5, 4,-2.5, 2.5,-4, 2.5,-15.5, .5,-15.510640 REM WATER VALVE10650 DATA 10,2.75,-23.25,2,-.510660 REM SHOP SHELVES1c}0670 DATA 10,5.5,-22.50,3,-110680 DATA 10,17,-22.50,3,-110690 DATA 10,.75,-20,1,-2.510700 REM TOY BOX10710 DATA 10,14.5,-d}9,4.5,-1.510720 REM SHOP CLOSET10730 DATA 9,3, 26.2,-21.9, 21,-21.9, 21,-2410740 DATA 9,3, 26.2,-21.55, 20.65,-21.55, 20.6e}5,-2410750 REM BASEMENT POLE10760 DATA 8,45,8.5,-11.5,.1610770 REM STEPS TO UP STAIRS10780 DATA 10,13.8,-11.25,.8,-3.251f}0790 DATA 10,15.4,-11.25,.8,-3.2510800 DATA 10,17.0,-11.25,.8,-3.2510810 DATA 10,18.6,-11.25,.8,-3.2510820 DATA 10,20.2,-1g}1.25,.8,-3.2510830 DATA 10,21.8,-11.25,.8,-3.2510840 DATA 10,23.4,-11.25,.8,-3.2510850 DATA 10,25.0,-11.25,.8,-3.2510860 h}REM DESK CHAIRS10870 DATA 10,3,-13,1.5,-1.510880 DATA 10,3,-8,1.5,-1.510890 DATA 10,4.8,-3,1.5,-1.510900 REM COUCH10910 i}DATA 10,5,-12,5,-370 DATA 10,3,-13,1.5,-1.510880 DATA 10,3,-8,1.5,-1.510890 DATA 10,4.8,-3,1.5,-1.510900 REM COUCH10910 10000 REM TEST DATA10010 DATA 10,0,0,10,1010020 DATA 10,2.5,2.5,5,510030 DATA 10,4,4,2,210040 DATA 10,0,3,10,410050 DATA k} 10,3,0,4,1010060 DATA 10,5,-5,1,110070 DATA 10,5,15,1,110080 DATA 10,-5,5,1,110090 DATA 10,15,5,1,1,0,3,10,410050 DATA iI BEGIFINIS| DRAW MAm}IN MENU || RELEASE 2.0 | +@AR@4=GSCREEN,2=EDIT SCREEN$70@n}@ @70@@ @.0=GTEXT, 1=EDIT TEXT870@ @70@@ @o}B-@L (@ ATARI CAD/CAMV-@@`!!(@ FACILITY LAYOUTj-@p}@t(@ MAIN MENU~-@@(@(A) 3D DRAWING-@@ (@q}(B) PRINT FILES-@@""(@(C) ONLINE MANUAL-@@""(@(D) LOAD TUBEDUMr}P-@@(@(E) 2D DRAWING-@@ (@ (F) TERMINATE0#@@s}K:0)@@ Ap  @e Ap!@p Ap"@hAt}("@p+2!"@i!% D1:DRAW2D.MSH<"@g% D1:HELP.BASF""@f"%D1:LISTING.BASu}P!"@e!% D1:DRAW3D.MSHZ +d(CURRENTLY THIS OPTIONn(EXISTS ONLY AS A GLEEMx(IN THE DISTAv}NT EYE OF ( THE CREATOR!!((HIT ANY KEY TO( TRY ANOTHER0#@@K:0)@w}@% Ap| LOAD TUBE DUMP OBJ || START=30844 || ENx}D =32624 | +@AR@4=GSCREEN,2=EDIT SCREEN70@@ y}@70@@ @0=GTEXT, 1=EDIT TEXT"70@ @70@@ @,-@z}6 (@ ATARI CAD/CAM@-@@J!!(@ FACILITY LAYOUTT-@@^!!{}(@ IS NOW LOADINGh-@@r""(@ A TUBE DUMP |-@@!!(@ |} UTILITY -@@$$(@ PLEASE WAIT!! //@@D:TDUMPG24.OBJ)@}})@)@)@6-$AV%)@)@6-$AV%" -~})@" @ 6-?:, A@D:DRAW)@6-$AV%" -O10000 REM TEST DATA10010 DATA 10,0,0,0,10,10,1010020 DATA 10,0,0,0,1,1,1RAW)@6-$AV%" -K&$$QQQQQQQQQQQ1Q1Q1Q1Q1Q1Q2Q2Q2Q4Q6Q6Q6Q6Q7Q7Q9Q16Q17Q19Q20Q25Q25Q36Q39Q48Q50}Q57Q59Q70Q71Q72Q75Q76Q77Q83Q97Q99PTPTLASTANSCLIPALASBLASKPTCNXYDIFXCENTEXMIRELAMIYMIRELBMAAM}ABMICNDIFMCANXYTYPANGANGXMAYMAFILENAMETEXTCS1BEGIENPRINTDIFDIFRELXRELANDELTFIECNADRADRECNT}ABABXXYYCSCALSCAL } } !"#$%&'()*+},-./01@23456789@:};<=>?@ABCDEFGHIJ}KLMNOPQRSTUVWXY}Z[\]^_`abcdefghi}jklmnopqrs6-6-@'6-@36-}??6-@K6-@W6-@c6-@o6-@{6-@6-@ 6-@6-@6-@}6-Ap6-@6-A 6-@#6->6-@@6-@e'6-@g36-@h?6-@i}K6-A pW6-@rc6-A`o6-A!`{6-A!p6-A16-A"6-AU6-AV6-A`}6-AC'6-A$36-A%?6-ApK6-A5W6-Agc6-A'o6-AG {6-AQ6-Ad6-B}www'6-A06-Aip'6-AI;,;,9<, $S 6.Y6-66- 6.I&6-.-96}-8<,D6-8<,S6A "6.Y A!C 6-%6-$+&,6-%-6-+&,$%;6-+&,$%}C6.I  )!6.O  )!6.O(4I*4I A 24O*4O A<4I*4O }A`d " n 6-6-"A"A@    6-8<,6-8<,  }!6-  6-  !6-  6-" / ,J  *  T !*! ^ } *  h !*! r " | 6-6-"A`"A   36-8<,6-8}<,$6-8<,/6-8<,3   6-6- !6-6-   6-6- !6}-6-& ,/ Db"Al"A @ "     6-8<,6-8<, } !6-  6-  !6-   6- ,6.N6.I >! 4}Y,6.N! R! /4O6.I!6.Yf p 6.Y6.Oz 6-6-   $O 6-&6-}&6-6+',*6-%+$,06-8->"D6-O6-6$%  "6-6-6$%  "6-6-+&,'6$  "}6-6-+&,'68  !)  B  !)  V  !*! `   *  j  !*! t   *   }* 6-%68<,-!68<,-'"*$   $   ""6-6-  ""  !6-% A%p}   6-(  &!$2  % $<  &!$F  % $P G 6--6-%/68<,-+$E:,,%C6}8<,-+$G:,,%G     J+ ;,;,/9A<,;,;,JD1:PRINTGR8.OBJ L ))})))6-$%0)7)E-$%&%L;,, < -)7,.>:," '1 A)p5"8#<  @"(}DATA SETS ON DISK DRIVE #1, A0 @D1:*.DAT  )(>:, A0 o A1`(1(INPUT NAME OF }DATA FILEP(FOR EXAMPLE:'D1:DEMO1.DAT'o(THIS FILE SHOULD HAVE BEEN l#(SAVED WITH THE LIST COMMAND&(6( FILE NAME=}:=(Y(I'M ATTACHING YOUR DATAl(STATEMENTS NOW& 1((TYPE RUN AFTER READY#- B1 X b (( BAD F}ILE NAMEv  5 AX6-6-A%6-16-A5   A 6-&6-&6-&#6-&+6-'36-}'A6-?u$    A4 * A 6-$6-+&,'6-&'6-%/6-&76-'A A4`\ 7 6-'6-+&,'}6-&'6-%/6-&76-'  B+%@0+6-+&,'+&,;6-+&,'+&,B6-6 6-+%,' A7`}$ 6-6-.M -2@#-' 129-= A G6-M6-t'-A }F:,'' A7@  A60!K:)!  6-6-C:,6-C:,J  "6-}P:,6-%(67,.=:,16-B:,A67%,. OF J6-B:,2567%,.=:,6-B:, "/6. 56-PB "*}967%,. ATARI LAYOUT BY JACK GILCHRISTB6-B:,Z> "567%,. >6-B:,d(6-?:}<<<<, )!( AG/%AC/ A83"-" 68<,-+68<,-}/ 3 &N "AD`b lG 6-$+8<,&, 6-%+6-8<,96-+&,$%G6-+&,$%C6}-$+8<,&,6-%'6-8<,56-+&,$%C6-+&,$% ! $   $ ! $   $   6-} !6-   6-* !6-4 -,/ $f( BAD COMMAND p-+ 0}0%0-0U - (DISPLAY OPTIONS&-<((A) SET WINDOWB-U( (B) DISPLAYN - (}(C) NEW DRAWING&-8( (D) RETURN>-N((E) STOP$+K:)' )!+ B " +L} "%D1:DRAWV "% D:DRAW2D.MSH` "  j# A2`~]+ (INPUT DATA MAX-MIN'S/( XMA}X==( XMIN=L( YMAX=Z( YMIN=](Y(CURRENT WINDOW RANGE+( XMAX=9( XMIN=H( YMAX=V}( YMIN=Y( m(YOUR OPTIONS ARE!+( (A) SHIFT X=( (B) SHIFT YX( (C) SET CENTER XC,YCm( (D) SCALE BY #}<]( (E) SET SCALE,( (F) SET WINDOWL( (G) WINDOW=DATA MAX-MIN'S]( (H) RETURNd+K:)'} )!+  " $+"@q6-6-!6-'6-+  " AS0"@f AS " AT0} " AUP " AVp"@p AW=(%(INPUT DESIRED SHIFT IN X )16-%96}-%= =(%(INPUT DESIRED SHIFT IN Y )16-%96-%= 6@g(+( INPUT X AND Y DESIRED AT CENTER!}B(CURRENT CENTER ISN6-+%,'Z6-+%,'g( XC=r`( YC=(*(DESIRED CENTER IS 086-&@6-%H}6-%P6-&X6-%`6-% T6-O:+&,'+&,,(.(CURRENT SCALE=D(CHANGE SCALE BY=HT6-+%,}'O6-+%,'6-+&,''6-+&,'16-%';6-&'E6-%'O6-&' &0T6-O:+&,'+&,,(.(C}URRENT SCALE=D(CHANGE SCALE TO=HT6-+%,'XO6-+%,'6-+&,''6-+&,'16-%';6-&'E6-%'O6}-&' Y(( YOUR VALUES0( WILL BE ADJUSTED TOV(!PROPORTIONAL RATIO OF THE TV TUBEY(b&(INPUT YOUR VIE}WPORT AS FOLLOWS>(XMAX,XMIN,YMAX,YMINT(YOUR VALUES ARE ^b  7 6-66-6-66-!+'/0}70HG 00--( PLEASE WAIT!3-G( I'M SCANNINGzP -( YOUR DRAWING#-7(} FOR IT'S X,Y=-P( MAX-MIN'S! AfP6-!"6-%!")"Ab!* @Ac}"Ad0!* AePZ$(I ENCOUNTER A TYPE OF DATA IB(DON'T RECOGNIZE. TYPE=Z(ENTITY NUMBER IS }8V """j %!6-%t & 6-&~ %!6-% & 6-& 1} -6-8<,%6-8<,+!16-  6- !6-  6-    <!"-"}!!6-d  6-n !6-x  6-    ""  !6-  6}- !6-  6- > 6-%6-%6-&#6-&)6-/6-56-;6->$,J "6-B}:, $rE6-$+&,6-%%6-+&,$%36-+&,$%E6-+'A ,$ "6-&+',-6-+'A,$@$}!"-6-&+',* 6-C:,"$6-@ &+',*6- - )!@9 !@"*!  } )! <6.7<,(6-%+$+P:+&P:,,$,,,<6-?:C:,<<<<,:  )"6-%D ")"6-%N   $b}" " 6-%"6-6  6-%6-6 " "T 6-68<,-68<,-,68<,-%768<},-G68<,-8<,T68<,-%=68<,-68<,-8<,)68<,-468<,-: =$36-8<,6-8<,!-}'"-6-36-4 "6-@6->ArpH;6-8<,&6-8<,&06-M:+$,%+$,,;6-D:',f}: 6-%68<,-+$E:,,%368<,-+$G:,,%7 :$ D:DRAW2D.MSH,&6-8<,&06-M:+$,%+$,,;6-D:',fM10000 REM BOX10010 DATA 10,0,0,10,1010015 REM TITLE10020 DATA 1,0,0,TEXT TYPE 110025 REM OTHER TEXT10030 DATA 2,5,1,TEXT} TYPE 210040 DATA 4,5,2,TEXT TYPE 410050 DATA 3,1,5,TEXT TYPE 310060 DATA 5,3,5,TEXT TYPE 510070 REM SOLID BOX11000 DATA} 11,0,0,1,111005 REM ANGLED BOX11010 DATA 12,7,7,1,2,2011015 REM FULL CIRCLE11020 DATA 8,10,1,8,.7511025 REM CCW ARC110}30 DATA 7,10,5,5,2,-30,30ED BOX11010 DATA 12,7,7,1,2,2011015 REM FULL CIRCLE11020 DATA 8,10,1,8,.7511025 REM CCW ARC110cdABFILENAMECLIPXYZTEXTCS1PTPTLASTANSM1VTYPETTADRADRIIALASBLASKPTCNDIFACENTEAMIRELUM }IBMIRELVMAUMAVMIUVULASVLASCNDIFDIFMCUVBEGIENPRINTADRAMADIFBMARELARELUNDELTFIBCENTEIECNTYP }ECNTXXYYZZXMAXMIYMAYMIZMAZMIAABBCSCALSCALXCENTEYCENTEZCENTEANGANGANGXYXYDIFDIFANPLP }@@@  } } !"#$%&'()*+,-./ }0123456789:;<=> }?@ABCDEFGHIJKLMN }OPQRSTUVWXYZ[\]@^ }_`abcd@ef| PLOTING CODE DRAW3D }|| RELEASE 1.0 |;@,;@,..9@P<@,;@@,; }@,$..;@,;@,9@<@,.669@<@,;@,9@<@,86->6 }-BwwwB 6-C:,6-C:,L6.PLANV-@@`-@@j'68<,-'ZERO VIEW MA }TRIXt ~ Z 68@<@,-@=68@<@,-@Z68@<@,-@))@@ }D:HIDDEN-@@-@@!@!BOX PLOT LOGIC68<,-  } @ A(| SUB. XYZ TO AB | FF6-8@<@ },$%8@<@,$%8@<@,$FF6-8@<@,$%8@<@,$%8@<@,$FF }6-8@<@,$%8@<@,$%8@<@,$($2<| WINDOWING SUB. |F }P 6.YZ 6-66-d 6.In6-x-@66-8<@,%6-8<@, }66-8<@,| TEST FOR DATA COMMAND |6A }COMMAND=1 IS PEN UP!"@6.Y! A$  | CONVERT XYZ TO TUBE UV | } 6-%@ AXYZ TO AB6-?$+&, 6-%6-+&,$% }6-+&,$%",| CLIP LOGIC |6@ 6.IJ  )!6.OT  )!6. }O^4I*4I A#h4O*4O Ar4I*4O A!p|| PT } IS OUT, LAST PT IN |"@A$p 6-6-"A"AP }NOT 90 DEGREES TO EDGE A% @A$p16-8@<@,16-8@<@,  }AVERT LINE !6-  6-& A0:HORZ LINED !6-N  6-X } / A$pb l | PT IS OUT, LAST PT OUT |v  *  }A$p!*!A$p * A$p!*!A$p"@A$p 6-6-"A p }"A!LN HITS TUBE AT ANGLE A%@A$p16-8@<@,16-8@ }<@,16-8@<@,16-8@<@,  A!@VERT LINE ACROSS TUBE   6-6-* }!6-6-4 A!@>HORZ LINE ACROSS TUBEH  6-6-R !6-6-\ ,f /p A$ }pz| PT IS IN, LAST PT OUT |"A#" }A#PNOT 90 DEGREES TO EDGE"@A$p A% @A$p16-8@<@, }16-8@<@, A#VERT LINE  !6-   6- A#$ . HORZ LINE8  } !6-B   6-L  ,6.N6.IV ` | TRY TO DRAW |j t A$p }~ # 4Y,6.N# A$ /  4O6.I6.Y A$  6.Y6.O  6-6-  }  $  | CLIP TO TUBE FOR ANGLE |  V=-M1*U+C1 EQ. } FOR LINE SETUP EQ FOR PLOT PTS  6-&6-& 6-6+', 6-%+$, &6-&# OF SOLUTIONS FOUND( }LOOP FOR PT ON EACH EDGE2 -@@< "@6- 6-6$%F "@6- 6-6$%P ""@ }6-"6-+&,'6Z ""@6-"6-+&,'6d TEST PT FOR ON TUBE BORDERn !) A'x !)  }A' !!TEST PT FOR IN RANGE OF PTS !*!A'  * A' !*!A'  * A' } STORE ANSWER 6-%@ 68<@,- 68<@,- "@$   $  } | CODE INITILIZATION |  +" INIT FOR DEGREES, !!LOAD ASSEMBLY CODE } FOR TEXT6 00@@D1:PRINTGR8.OBJ@ {)@)@*)@7)@G6-$AV }%T)@a)@{-$AV%&%@J  ;,6-C:,T .-@)@*7,.>:,. ^  }@h r | GET DATA ATTACHED ||   A)`"# A1 "" }(DATA SETS ON DISK DRIVE #1 DISPLAY DISK DATA SETS A0 ))@@D1:*.DAT ")@ }(>:," A0 @ A1P "("(INPUT NAME OF DATA FILE ""(FOR EXAMPLE:'D1:DEMO1.DAT' ""(THIS }FILE SHOULD HAVE BEEN ##(SAVED WITH THE LIST COMMAND (( FILE NAME=  "("(I'M ATTACHING YOUR DATA (!}STATEMENTS NOW ((TYPE RUN AFTER READY& READ IN DATA STATEMENTS0 : BD A2N TRAP FOR B!}AD INPUTX (( BAD FILE NAMEb %l v | SET UP WINDOW MAX/MINS | !}  AR`CALC MAXMIN'S 6-@6-A 6-@6-A AA0 ""RETURN HERE AF!}TER WINDOW SET  6-&6-&  6-&6-&  6-'6-' CORRECT FOR SHAPE OF DOT 6-?u$ ""!} ""| MAKE WINDOW PROPORTIONAL | "" CHECK FOR DIFA TOO SMALL!}    A4 6-$* 6-+&,'@4  6-&6-%>  6-&6-'H A4PR 6-'\ 6-+&!},'@f  6-&6-%p  6-&6-'z WINDOW VALUES ALL SET NOW  | INIT FOR PLOT |!}  +@%@ '0@@ '@ ""SET UP TRANSFORMS TO CONVERT ""A,B!} DATA INTO TUBE U,V SPACE 6-+&,'+&, 6-+&,'+&, 6-6 6-+%,'@ 6-+%,'@ A7`! }| RETURN FROM PICTURE |$-AdAU!6-@-! }6-@.-@82@@B-@@ L%%2V! }-@@ ` j6-@6-@t-@A ~%F:Ad,AU'% A7@ ! } A600#@@K:0)@@ AA0  | ! }START LOOP FOR PLOTING | 6-GET NEXT COMMAND TYPE A5"6-P:!},6-%@67@,.=:,  6-B:,67%@,. OF  6-B:,(67%@,.=:,2 6-B:,!}<$ "6. $6-@FT"@*@K67%@,. ATARI LAYOUT BY JACK GILCHRISTT6-B:,PJ!}"@A67%@,. J6-B:,Z 6-?:<<@#<<,dn# @)!!}@# AA xqgAYAYAYAYAYA(A(A(A9pA@`A@`A@`q A8!}| SUB FOR PT ARRAY |"-@ "668!}<@,-%68<@,-668<@,-  A0| SUB FOR BOX |!} AcGET BOX CORNERS Ae DRAW BOX$( BAD COMMAND A5",| MA!}IN MENU |6@ +@AQ@J70@@ @70@@ @T70!}@ @70@@ @^,(@,(@ DISPLAY OPTIONSh+(@+(@ (A) SET !}WINDOWr((@((@ (B) DISPLAY|,(@,(@ (C) NEW DRAWING'(@'(@ (D) RE!}TURN%(@%(@ (E) STOP,(@,(@ (F) DATA REVIEW,(@,(@ (G) CHANGE !}VIEW;#@@K:0)@;@# @e)!@q# AA0#"@p AD#!} AA0"@i+"@h%D1:DRAW "@g % D:DRAW3D.MSH#"@e AFP# A!}A0#"@q Ah# AA`# A2P| SUB DATA REVIEW |&!}0 +:((XYZ DATA MAX-MIN'SD( XMAX=(XMIN=N( YMAX=(YMIN=X!( ZMAX!}=(ZMIN=!(b(XYZ DISPLAY RANGEl( XMAX=(XMIN=v( YMAX=(YMIN=!( ZMAX=(!}ZMIN=!(((( PROJECTION MAX-MIN'S (HORZ/VERT)( HMAX=(HMIN=!( VMAX=(VMIN=!( (CU!}RRENT PROJECTION RANGE( HMAX=(HMIN=( VMAX=(VMIN='('( VIEW MATRIX BEING USED IS>! }>(8@<@,8@<@,8@<@,>>(8@<@,8@<@,8@<@,>>!!}(8@<@,8@<@,8@<@, (HIT ANY KEY TO CONTINUE;#@@K:!"}0)@;@$ | SUB SET WINDOW | * +4(YOU!#}R OPTIONS ARE!>( (A) SHIFT HORZH( (B) SHIFT VERTR( (C) SET CENTER HC,VC\( (D) SCALE BY #f( !$} (E) SET SCALEp( (F) SET WINDOWz( (G) WINDOW=FILL( (H) RETURN;#@@K:0)@!%};@# @e)!@r# ACp"@r$U"@q6-6-!6-'6-96-+%,'@!&}K6-+%,'@U ACp"@e AH@"@f AH"@g AI@#"@h)"@!'}i# AP`"@p AQP SHIFT A((INPUT HORZ SHIFT 6-%6-% 6-% ACp!(} SHIFT Y$ ( (INPUT VERTICAL SHIFT.8 6-%6-%B 6-% ACpLSET X,Y CENTERV"("(!)}INPUT HORZ,VERT CENTER!`(CURRENT CENTER ISj( HC=t( VC=(~(DESIRED CENTER IS  ! !*}6-&6-%6-%!6-! 6-&6-%6-%!6- ACpSCALE OPTIONS6-O:+&,'+&,,!+}((CURRENT SCALE=M"@h%(CHANGE SCALE BY=);6-+&,'@M6-+&,'@M"@i%(CHANG!,}E SCALE TO=);6-+&,'@M6-+&,'@ 6-%' 6-&' 6-%'  6-&' ACp(!-}SET WINDOW VALUES(( YOUR VALUES2( WILL BE ADJUSTED TO<))(!PROPORTIONAL RATIO OF THE TV TUBEF(P&&(INPU!.}T YOUR VIEWPORT AS FOLLOWSZ++(#HORZ_MAX,HORZ_MIN,VERT_MAX,VERT_MINd(YOUR VALUES ARE n x'6-+%,'@!/}'6-+%,'@ ACp  | CALC XYZ & AB MAXMIN'S | !0}" 6-66-6-6-"6-! 6-6-6-6-!6- +@AQ@70@@ !1}@70@@ @70@ @70@@ @,(@,(@ PLEAS!2}E WAIT!,(@,(@ I'M SCANNING,(@,(@ YOUR DRAWING,(@,(@ !3} FOR IT'S 3D+(@+(@ MAX-MIN'S! AW6-",LOOP FOR EACH ENTITY6"!4}@6-%@J!!!@ * @AUT"@ AV^!!!* @AVPh$$(I ENCOUNTER !5}A TYPE OF DATA Ir!!(DON'T RECOGNIZE. TYPE=|(ENTITY NUMBER IS CALC MAXMIN OF BOXGET BOX CORNE!6}RS Ac-@@66-8<@,%6-8<@,66-8<@, Ag  AT!7}CALC MAXMIN OF PTARRAY"'-@"# Ag'  ATCALC MAXMIN OF TEXT!8}& "0"@ AT: AgD ATN 6-%6-%6-%X 6-&6-&6-&b6-+!9}%,'@l6-+%,'@v6-+%,'@ 6-6- 6-6- 6-6- AX 6-6-!:} 6-6-6-+%,'@6-+%,'@$| SUB FOR AB MAX-MINS |!;} 6-66-66-6--& -&-&  6-6-6- !<}A*  6-4  6-> !6-H !6-R   \$fp| !=}SUB FOR PLOT OF TEXT |z " A 6-B:, @$GET TUBE A,!>}B6-?$+&, 6-%6-+&,$%6-+&,$%CALC POSITION IN GR.06-+'A ,$@@!!?}"@!6-&+'@,6-+'A,$@$!"@!6-&+'@,3"@'6-@ &+'@!@},36-@#-@$# @)!@9# Ab`.#!@"*!@# Ab`8# )!@#!A}# Ab`B6.7<,LALLOW FOR VERT SHIFT TOVFRACTIONS OF A LINE`))6-%+@@$+P:+&P:,,$@,,,j!B}6-?:<<<<@,t' @)"@'6-%@~'"@)"@'6-%@ $!C}| SUB FOR BOX || CALC ALL CORNERS |" !D}6-%6-6 6-%6-6 6-%6-6"@"6-GET 8 CORN!E}ERS-% -%-%6-%@(668<@,-%68<@,-668<@,-2 !F}< F P$Zd| SUB TO DRAW BOX |nx 6-(-@@!G}(GET TUBE DEPTH66-8<@,%6-8<@,66-8<@, A+68<@,-@+68<@!H},-  6- MARK HIDDEN CORNERS-@@+8<@,"+68<@,- !I}SET UP DRAW TABLES6-@#-@@#BOX PLANE&-@@&PLANE CORNER$-@!J}@$CORNER XYZ68<,-88<,<,, 17'88<,<@,"Ag07HIDDEN CORNER6 @ A!K}`DRAW PLANEJ T$^h| TEST XYZ FOR MAX-MIN |r| !L}!6-  6- !6-  6- !6-  6-$| S!M}ET VIEW MATRIX |'+@%@'AQ@((@((@  VIEW##!N}(@ NEW VIEW OPTIONS(@++@@ D:VIEW.MAT@-@&!O}@0(((@ (>:@d%,) :-@@D@N X b@!P}l0#@@K:0)@v@6-&@d @)!Ah++@@!Q} D:VIEW.MAT@-@@-@@@< "!R}68<@,-+68<@,-<68<@,-  ! @ AW0$ D:DRAW3D.MSH0,!S} 1,1,0, 0,1,0, 0,0,0,,9,5, 0,0,2, 1,0,2, 1,1,2, 0,1,2, 0,0,2 9,2, 0,0,0, 0,0,2*9,2, 1,0,0, 1,0,249,2, 1,1,!T}0, 1,1,2>9,2, 0,1,0, 0,1,2A`A,1,2, 0,0,2 9,2, 0,0,0, 0,0,2*9,2, 1,0,0, 1,0,249,2, 1,1, 510000 REM 10010 REM | HOUSE DATA FLOOR 1 |10020 REM 10030 REM 10040 REM OUTSI%V}DE WALLS (WEST)10050 DATA 10,0,0,27.0,.710060 DATA 11,-.7,.7,2.7,-.710070 REM DEN WINDOW10080 DATA 10,2,.5,5,-.310090 RE%W}M KITCHEN WINDOW 110100 DATA 11,25,.7,2,-.710110 DATA 10,20,.5,5,-.310120 REM KITCHEN WINDOW 210130 DATA 11,7,.7,5,-.710%X}140 DATA 10,12,.5,3.5,-.310150 DATA 11,15.5,.7,4.5,-.710160 REM SOUTH WALL10170 REM DEN WALLS10180 DATA 10,9,0,.4,-6.410%Y}190 DATA 10,9,-8.9,.4,-2.510200 DATA 10,0,-11,6,-.410210 DATA 10,0,-11,1,-.410220 DATA 11,-.7,0,.7,-24.410230 REM COMMON %Z}WALL KIT/DINNING RM10240 DATA 10,9.4,-11,13.5,-.410250 REM DINNING RM10260 DATA 10,13,-11.4,.4,-6.2510270 DATA 10,13,-23.%[}9,.4,-.510280 REM FRONT WALL10290 DATA 10,-.7,-24.4,26.7,-.710300 DATA 11,-.7,-24.4,2.95,-.710310 DATA 10, 2.25,-24.6,2.5%\},-.310320 DATA 11,4.75,-24.4,5,-.710330 DATA 10,9.75,-24.6,2.5,-.310340 DATA 11,12.25,-24.4,3.15,-.710350 REM FRONT DOOR%]}10360 DATA 10,15.4,-24.6,3,-.310370 DATA 11,18.4,-24.4,3.5,-.710380 REM HALF BATH WINDOW10390 DATA 10,21.9,-24.6,2,-.3104%^}00 DATA 11,23.9,-24.4,2.5,-.710410 REM NORTH WALL10420 DATA 10,27,0,.4,-410430 DATA 10,27,-7,.4,-410440 DATA 10,26,-11,.4%_},-.510450 DATA 10,26,-14.5,.4,-10.610460 REM FAMILY ROOM10470 DATA 10,26.7,9.7,.7,-9.710480 DATA 10,26.7,9.7,17.4,-.7104%`}90 DATA 11,43.4,9.7,.7,-48.0510500 DATA 10,26,-11,17.4,-.410510 REM DOOR FM10520 DATA 10,26.9,8.5,.3,-5.510530 DATA 11,26%a}.7,9.7,.7,-1.210540 DATA 11,26.7,3,.7,-310550 REM WINDOW FM10560 DATA 11,26.7,9.7,4.7,-.710570 DATA 10,31.4,9.5,8,-.3105%b}80 DATA 11,39.4,9.7,4.7,-.710590 REM LAUNDRY RM10600 DATA 10,37.5,-11.4,.4,-610610 DATA 10,29.4,-17.4,8.5,-.410620 REM KI%c}TCHEN CLOSET10630 DATA 10,15.75,-9,.4,-210640 DATA 10,18.1,-9,.4,-210650 DATA 9,2,15.75,-9,18.1,-910660 REM GARAGE10670 %d}DATA 11,25.7,-25.1,.7,-13.2510680 DATA 11,25.7,-37.65,1.25,-.710690 DATA 11,42.85,-37.65,1.25,-.710700 DATA 10,26.95,-37.8%e}5,15.9,-.310710 REM PORCH10720 DATA 10,13.7,-25.1,12,-910730 REM BATH AND CLOSET WALLS10740 DATA 10,19.15,-18.9,3,-.4107%f}50 DATA 10,24.15,-18.9,1.85,-.410760 DATA 9,2,19.15,-18.9,19.15,-24.410770 DATA 10,21.25,-19.3,.4,-5.110780 REM WALL FOR S%g}TAIRS10790 DATA 10,16.4,-14.4,.4,-3.2510800 DATA 10,16.8,-14.4,6.1,-.410810 REM STEPS10820 DATA 10,13.4,-14.4,3,-110830 %q}B%DOS SYSB*)DUP SYSBSDEMO2 DATBjDEMO3 DATBlDRAW BDEMOA3D DATBJDRAW2D MSHBDEMO4 DATBDRAW3D MSHBUDEMO1 DATBuDEMOB3D DATB(xLISTING BASBPRINTGR8OBJB-HELP BASBTDUMPG24OBJBVIEW MATB VIEWBLD BASBHIDDEN BMUD BASB COMPROOMDATBREADME DATA 10,13.4,-16.4,3,-110840 DATA 10,16.4,-11.4,1,-310850 DATA 10,18.4,-11.4,1,-310860 DATA 10,20.4,-11.4,1,-310870 REM R%r}OOM NAMES10880 DATA 5,4.5,-4.5,DEN10890 DATA 4,33,-14,WASH10900 DATA 4,6.5,-18,DINNING10910 DATA 4,6.5,-20,ROOM10920 DAT%s}A 4,35,5,FAMILY10930 DATA 4,35,1,ROOM10940 DATA 5,35,-26,GARAGE10950 DATA 4,19,-29,PORCH10960 DATA 4,24,-20.5,B10970 DAT%t}A 4,19,-4,KITCHEN10980 DATA 1,0,0,FIRST FLOOR LAYOUT,-26,GARAGE10950 DATA 4,19,-29,PORCH10960 DATA 4,24,-20.5,B10970 DAT$610000 REM BASEMENT WALLS10001 DATA 10, 0,1.5,0, -1.5,-16,710010 DATA 10, 0,0,0, 7.5,1.5,710015 REM FURNACE ROOM WALLS1002)v}0 DATA 10, 6.5,0,0, .33,-2.5,710021 DATA 10, 6.5,-5.5,0, .33,-.58,710022 DATA 10, 6.83,-6.08,0, 6.5,.33,710025 REM WINDOW)w}10030 DATA 10, 3.42,0,6.25, 2.66,1.5,.75 10, 6.5,-5.5,0, .33,-.58,710022 DATA 10, 6.83,-6.08,0, 6.5,.33,710025 REM WINDOW()12I^ARLINELNAFNAMECS1CNPAGPAGECCNDONES@-y} """"| LAST REVISED ON 12/10/83 -z}|""| UTILITY FOR LISTING |$-{};@,;@,. A8""B""| INIT FOR FIRST USER LINE |L""-|}V A`INDEX FIRST LINE 5 SPACESj(@ t6-~%6-%LAST BYTE P-}}ROCESSED46-@4# OF LINES PRINTED ON CURRENT PAGE96-@9# OF CHARACTERS PRINTED ON CURRENT LINE,6--~}@,CURRENT PAGE BEING PRINTED46-@4PAGE COUNT SINCE LAST FIX OF "TOF"""-}""| BEGIN LOOP FOR NEXT BYTE |""""CHECK FOR LAST CHARACTER WASEND OF LINE. IF SO -}INDEXNEXT CARD IN 5 SPACES.="AU#(@ 16-%@=6-@CHECK FOR LONG LINEL-}!@e6-@)6-%@B(@ L A HANDLE PAGE BREAKS HERE!@b A"P-})@6-%@(.!@1*@$(>:,. A`2 < | ATARI/EPSO-}N CONVERSION |F P 6-X=EPSON Y=ATARIZ"@6-AV|d"@6--}ATn"@6-AQx"@6-AI"@6-Au"@6-A-}4"@&6-AS"@6-AP"@#6-AR"@$6-A-}X"@6-AY"@6-AW*@(>:, A`-}| CODE EXITING LOGIC |%6-@%FLAG NO NEW TMARGIN A"P PAGE B-}REAK LOGIC +"-@@,&(@>:@,&RING BELL6 @%D1:DRAWJ-}T| USER INITILIZATION |^h +r!!(THIS PROCEEDURE WILL LIST| (A PROG-}RAM STORED ON YOUR(DISK IN LIST FORM.( IT CONVERTS ATARI(CHARACTER<32 TO THEIR(EPSON EQUILIVE-}NT!#(#(DO YOU WISH TO CONTINUE?( ENTER (Y/N):0#@@K:0)@$@-}@$ A((INPUT THE FILE NAME (FOR EXAMPLE: D1:CODE.LST( FILE NAME IS ( (-}| PRINTER INITILIZATION |& A!00""@@-}P: A"D @@NINITILIZE THE PRINTERX%%(@>:@',>:@d,b00(@-}>:@',>:@g,>:@g,l""(DO YOU WANT DOUBLE STRIKE?v0#@@K:0)@$-}@@$ APDOUBLE STRIKE$$(@>:@',>:@q,(( LISTING FOR  ( (((-}1 LINE LARGE CHARACTERS + EMPHASED??(@>:@',W>:@,>:@',>:@i,!!TURN ON UNDERLING FOR-} TITLE))(@>:@',->:@,(@0%(@ LISTING OF 0(@(@-}TURN OFF EMPHASED%%(@>:@',>:@p, ""TURN ON COMPRESSED CHAR MODE(@>:@, T-}URN OFF UNDERLING*))(@>:@',->:,4SET # OF CHARS/LINE = 66>))(@>:@',Q>:@f-},H AR\| ERROR TRAPS HERE |fp"("(TURN ON THE PRINTER-} ANDz(SET AT TOP OF PAGE(HIT ANY KEY WHEN READY!0#@@K:0)@@-} A0"("(I HAD A PROBLEM OPENING(THE FILE NAMED (SO I AM TERMINATING-}| SUB FOR PAGE BREAKS |HANDLE SCREEN BREAK,()( END OF PAGE #(-}),( | PRINT PAGE # |  !@b A#$ -@b. (@-} 8  B 6-@cL 0(@ 0(@ V ''(@ PAGE #()` 6--}%@j t | SET BOTTOM MARGIN |~  !(@ !(@  -}6- 6- 6-%@ 6-%@  @ A%` "" ""-}| COMPENSATE FOR TOF DRIFT | "" (@  6-@  -}| SET TOP MARGIN |  !!(@ !$ 6-@( -@+&@,2 (-}@ <  F INDEX IN FOR NEXT LINEP (@ Z $ D:LISTING.BAS-@+&@,2 (,ah hh`hhhhhhhheX֥Yeׅטi@֥i׈ݠܱؠՊ)`@ @ ڊ)څک1}*mۤݱEդܑȄжi(֐ݩП`֥Yeׅטi@֥i׈ݠܱؠՊ)`@ @ ڊ)څک0/  ,FILEPAG@2 ";@,"6. D:HELPDOC.T| HELP5} UTILITY || RELEASE 2.0 | A0 +@AR@$70@@ @5}70@@ @.70@ @70@@ @8B| HELP MENU |L5}V-@@` (@ DOCUMENTATIONj-@@t""(@HELP AVAILABLE ON~5}-@@(@(A) USING HELP-@@!!(@(B) GEN. PURPOSE-@@5}(@ (C) METHOD-@@ $$(@(D) GETTING STARTED-@@(@(E)5} DATA IDEAS-@@(@ (F) WINDOWING-@@""(@(G) MAKING MANUAL -@5}@""(@(H) COPYING CODES-@@($$(@(I) CALLING AUTHORS2-@@5}<(@ (J) HARDCOPYSF-@@P(@ (K) DEMO'SZ-@@d##(@(L) TERMI5}NATE HELPn0#@@K:0)@x@6-&@d"@Ap!! @5})!@A"@A@ Ap A| DATA MENU |5} +@AR@70@@ @70@@ @70@ @70@5}@ @-@@ (@ DOCUMENTATION-@@""(@HELP AVAILABLE ON5}"-@@,(@ DATA IDEAS6-@@@(@ (A) OVERVIEWJ-@@T 5} (@(B) COORDINATES^-@@h""(@(C) GENERAL RULESr-@@ |##(@(D) 5}ENTITY FORMATS-@@!!(@(E) PLOT CONTROL-@@(@ (F) SAVING-@5}@(@ (G) LISTING-@@(@ (H) DEBUGING-@@(@5} (I) RETURN TO-@@(@ HELP MENU0#@@K:0)@@5}6-&@d!! @)!@ Ap&"@ A06-%@: ApD ApN5}Xb| HELP DISPLAY UTILITY |lv67@,.=:, AP5} @@ A p| FILE MISSING | +5}+( (+(YOUR DISK IS MISSING THE DATA(( FILE NAMED ((((TO USE THE HELP FUNCTIONS YOU((((WILL NEE5}D TO GET ALL THE DATA&(&(FILES, 'HELPDOC.T??', FROM ((YOUR BACKUP DISK.(( ( (((HIT ANY KEY TO CONTIN5}UE  A"!! !!| LOOP FOR EACH CHARACTER |*!!4 +5}AR@> A"@H)@R"@A!`\ >:,f A! pz5}| PAGE COMMAND HIT |6-@@@#**(! ԠŠҠҠԠš5} A"p| EOF TRAP HIT |6-*@@"(*@5}@"&&( Ԡ٠٠Ҡՠ0#@@K:0)@@ 5} | TEST FOR ANOTHER PAGE | $ !!"@2*A p. @5} B8 $  | FLIP DISK TO HELP SIDE |  A15} --@@ D:HELPDOC.T1 @ $ +@%@ @! -@& ,5}(@,(@ FLIP LAYOUT0 ,(@,(@ FLOPPY OVER: ,(@,(@ TO BACK S5}IDED +(@+(@ AFTER BUSYN .(@.(@ LIGHT TURNS OFF!S (@X ((@((5}@ HITb +(@+(@ ANY KEY TOl *(@*(@ CONTINUEv 0#@@5}K:0)@ @ A00""""| FLIP DISK TO MASTER SIDE |"5}" A@p''@@D:DRAW@ +@%@ @5}-@*(@*(@ EXITING*(@*(@ TO MAIN)(@)(5}@ PANEL%D:DRAWWRONG SIDE OF DISK IS UP +@%@ @+(@+(@5} FLIP FLOPPY+(@+(@ AFTER BUSY-(@-(@ LIGHT GOES OUT!(@"+5}(@+(@ HIT ANY KEY,+(@+(@ TO CONTINUE60#@@K:0)@5}@@h A@0 D:HELP.BAS| HELP UTILITY | +5}--@@ D:MANUAL.DAT A@)@ >:, A$@5}!!(@(N) ENTITY RULES0#@@K:0)@@| HELP UT5}ILITY | +--@@ D:MANUAL.DAT  A)@ >:5},$ A@L +--@@ D:MANUAL.DAT  A)@ >:4|xphx% &qʍx x X`LHH#X R zV~}o9}i`h% PM% ;m .J &!U &E &hhLhhh@HHH9}ѭ׭إW٥XڥYۥ{٭ڭۥXץYixi( #(' !9}ͩέP' ͩΥ`NFfͥP'8'NFfͥ7NFfͥrN8' 'FfͥY9}NFfͥI<' ! !'#N!&Υ('! &e͍e΍()K+9}D+()(++()88#8<˭9}̠&11)8D 8HAY8č8p 89}!# d'&N+ AN+ N+ N+ 'ڬ8jޅ֬8j߅׬8j9}܅ةݭ̭˭Эϭ P˪Պ)ͩ*Υmͭ)e΅ΠԈEM %ޠϑ ЩЕ;9}Ԥ8 ˰ИFުJ%ފťօޥυͥЅΥͅϥ΅Э̭˭ZКM%ߠϑ89}˰FߪJ%ߊЗׅߩЪυѥЅ٥хϥمЭ̭˭!A)?ͩ*m͊mΠ9}ԈM%%ܠϑ Щ?ТЖԤ8#˰УFܪJ%܊ť؅ܭ̭˩г N+ 9}N+ +N+ )N+ (N+  9ԭՠˢN+ɛ   ϩЃ3ԭՠˢ9}N+ɛ   ϭ! 7ԭՠˢN+ɛ   Д˩N+ N+9} @N+ N+ hhhh@ϭ! 7ԭՠˢN+ɛ   Д˩N+ N+8%101,PLAN1,0,00,1,00,0,12,SIDE1,0,00,0,10,-1,03,FRONT0,-1,00,0,1-1,0,04,REAR0,1,00,0,11,0,05,BOTTOM1,0,00,-=}1,00,0,-16,OTHER SIDE-1,0,00,0,10,1,07,AUX TFL.707,-.707,0.224,.224,.948-.67,-.67,.3178,AUX TFR-.707,-.707,0.224,=}-.224,.948-.67,.67,.3179,AUX TRL.707,.707,0-.224,.224,.948.67,-.67,.31710,AUX TRR-.707,.707,0-.224,-.224,.948.67,.67=},.317.948-.67,.67,.3179,AUX TRL.707,.707,0-.224,.224,.948.67,-.67,.31710,AUX TRR-.707,.707,0-.224,-.224,.948.67,.67<;L| VIEWBLD |L++@@ D:VIEW.MATQ(@A}10VPLAN VIEW`(@1,PLANj(@1,0,0t(@0,1,0~(@0,0,1SIDE VIEWA}(@2,SIDE(@1,0,0(@0,0,1(@0,-1,0FRONT VIEW((@3,FRONA}T2(@0,-1,0<(@0,0,1F(@-1,0,0REAR VIEW(@4,REAR(@0A},1,0(@0,0,1(@1,0,0BOTTOM VIEW(@5,BOTTOM(@1,0,0(@A}0,-1,0(@0,0,-1JOTHER SIDE VIEWT(@ 6,OTHER SIDE^(@-1,0,0h(@0,A}0,1r(@0,1,0OTHER AUX LH FRONT(@ 7,AUX TFL(@ .707,-.707,0(@.224A},.224,.948(@-.67,-.67,.317OTHER AUX RH FRONT(@ 8,AUX TFR&(@ -.707,-.707,00 A} (@.224,-.224,.948:(@ -.67,.67,.317vOTHER AUX LH REAR(@ 9,AUX TRL(@ .A}707,.707,0 (@-.224,.224,.948(@ .67,-.67,.317OTHER AUX RH REAR(@ 10,AUX TRRA}(@ -.707,.707,0!!(@-.224,-.224,.948(@ .67,.67,.317 @ D:VIEWBLDRR@x124315687526842157311265134873(@ .67,.67,.317 @ D:VIEWBLDRRD<d n | MUD |x '+@%@'AQ@0@@ @I}0@@ @0@ @0@@ @-!!(@ I} NOW LOADING(@""(@ Atari CAD/CAM##(@ Facility Layout(@ (@I} written by(@""(@ Jack Gilchrist(@ and!!(@ Phil HeavenI},%D:DRAW D:MUD.BAS""(@ Jack Gilchrist(@ and!!(@ Phil HeavenH 10000 REM Outside Walls10010 DATA 11,0,0,.6,910011 DATA 10,0,9,.2,410012 DATA 11,0,13,.6,910020 DATA 11,0,22,8,-.610021 M}DATA 10,8,22,4,-.210022 DATA 11,12,22,8,-.610030 DATA 11,20,22,-.6,-910031 DATA 10,20,13,-.2,-410032 DATA 11,20,9,-.6,-9M}10040 DATA 10,20,0,-3.5,.210041 DATA 10,16.6,0,-3.6,.210042 DATA 11,13,0,-5.5,.610043 DATA 10,7.5,0,-2.5,.210044 DATA 11,M}5,0,-5,.610100 REM Inside Walls10110 DATA 9,4,.65,.65,.65,21.35,19.35,21.35,19.35,.6510120 DATA 10,.65,.6,4.35,.0510121 DM}ATA 10,7.5,.6,5.5,.0510200 REM Counter Top10210 DATA 9,4,13,.65,10.5,3.15,10,3.15,7.5,.6510220 DATA 9,7,3.15,.65,3.15,16.3M}5,5.65,18.85,14.35,18.85,16.85,16.35,16.85,5.65,19.35,3.1510300 REM Cabinets10310 DATA 10,.65,.65,2.5,210311 DATA 4,1.5,2,M}CAB10320 DATA 10,.65,16.35,2.5,-210321 DATA 4,1.5,16,CAB10330 DATA 10,5.65,21.35,2,-2.510331 DATA 4,7,21,CAB10340 DATA 1M}0,16.85,16.35,2.5,-210341 DATA 4,18.5,16,CAB10350 DATA 10,16.85,5.65,2.5,210351 DATA 4,18.5,8.5,CAB10400 REM Printer StanM}ds10410 DATA 10,.65,6.5,2.5,210411 DATA 4,2,8,PRT10420 DATA 10,.65,8.5,2.5,210421 DATA 4,2,10,PRT10430 DATA 10,14.35,21.M}35,-2,-2.510431 DATA 4,13.5,20,PRT10500 REM Book Cases10510 DATA 12,3.15,16.35,3.54,1,4510511 DATA 4,4,19.5,BK10520 DATAM} 12,14.30,19.05,3.54,1,31510521 DATA 4,15.5,18,BK10530 DATA 9,5,8.5,.65,10.25,2.30,10.25,3.15,10.25,2.30,12,.6510531 DATA M}4,9,3.5,BK10532 DATA 4,12,3.5,BK11000 DATA 1,0,0,COMPUTER ROOM,8.5,.65,10.25,2.30,10.25,3.15,10.25,2.30,12,.6510531 DATA LATOOL BOX DISK 21The README file.This disk features a two and threedimensional design system written byyour favoirty syR}sop. I tried to capture the major features of thecomerical CAD/CAM systems that Ihelp develop for a living. Features iR}nclude windowing, scaling,multiple views, hardcopy drawings onyou printer, text, simple hidden linemetods, etc. I have deR}signed my house layout using this package andhave included demos, etc to show offthe possibilites.Start by reading the dR}ocument named'README' for instructions on how torename and distribute this softwarebetween the two disks that will berequR}ired.Everything you need is on this diskbut the next disk contains a manualand an unmashed version of the codeif you wisR}h to figure out how itworks. I think you will find thatthe on-line help menus will beenough to really get you started.YR}ou must rename and distribute thecodes as follows:----- DISK #1 -----DEMO2.DATDRAW2D.MSHDEMO3.DATDEMO4.DATLISTING.R}BASDRAW3D.MSHDRAWPRINTGR8.OBJHELP.BASDEMO1.DATTDUMPG24.OBJVIEWBLD.BASVIEW.MATHIDDENDEMOA3D.DATMUD.BASAUTORUN.SYSR}PLUS: ADD DOS.SYS AND DUP.SYS----- DISK #2 -----MANUAL.TXT --- ON ANOTHER D/L DISKDRAW2D.LST --- DRAW2DL ON NEXT DR }ISKHELPDOC.T1 --- HELPDOCAHELPDOC.T2 --- BHELPDOC.T3 --- CHELPDOC.T4 --- DHELPDOC.T6 --- EHELPDOC.T7 --- FHELPDOC.T8 -R }-- GHELPDOC.T9 --- HHELPDOC.T10 -- IHELPDOC.T11 -- JHELPDOC.T20 -- KHELPDOC.T21 -- LHELPDOC.T22 -- MHELPDOC.T23 -- NHR }ELPDOC.T24 -- OPLEASE MAKE A BACKUP OF YOUR DISKSAFTER RENAMING AS YOU HAVE EXPENDEDA LOT OF ENERGY GETTING THIS FAR ANDR }WE WOULDN'T WANT TO HAVE TO STARTOVER IF WE MAKE A SILLY ERROR.UNTIL YOU GET YOUR MANUAL FROM THENEXT TOOLBOX D/L DISK IR } SUGGEST YOUWORK YOUR WAY THROUGH THE HELP OPTIONS TO GET THE LAY OF THE LAND.THEN TRY THE DEMOS TO SEE THE TYPESOF DISPLR}AYS POSSIBLE. AFTER THATUSE YOUR CREATIVE JUICES AND JUSTLET IT HAPPEN. IF YOU CREATE ANY REALLY INTERESTINGPICTURES YR}OU MIGHT WANT TO UP LOADTHEM FOR US ALL TO SHARE..... FAST FINGERS.OU CREATE ANY REALLY INTERESTINGPICTURES YPR